home *** CD-ROM | disk | FTP | other *** search
/ My Neighborhood / My Neighborhood.iso / mac / MacFiles / Vending.Dxr / 00008.ls < prev    next >
Encoding:
Text File  |  1997-11-18  |  422 b   |  22 lines
  1. on exitFrame
  2.   set temp to random(20)
  3.   if temp <= 10 then
  4.     askEasyQuestion()
  5.   else
  6.     askHardQuestion()
  7.   end if
  8.   set temp to the castNum of sprite 2
  9.   repeat while soundBusy(1)
  10.   end repeat
  11.   if (temp > 271) and (temp <> 331) then
  12.     Talk(EMPTY & temp)
  13.   else
  14.     if ((temp > 240) and (temp < 272)) or (temp = 331) then
  15.       Talk("next number")
  16.     else
  17.       Talk("what next")
  18.     end if
  19.   end if
  20.   pause()
  21. end
  22.